01 LBL "J2" 
02 MDY 
03 ENTER^ 
04 FRC 
05 STO N 
06 - 
07 RCL X 
08 400 
09 MOD 
10 STO M 
11 - 
12 2 E3 
13 ST+ M 
14 - 
15 365.2425 
16 * 
17 X<> M 
18 E6 
19 / 
20 RCL N 
21 ABS 
22 E2 
23 * 
24 + 
25 1.012 
26 X<>Y 
27 DDAYS 
28 RCL M 
29 + 
30 DMY
31 CLA 
32 END 
